VERSION 1.0 CLASS
BEGIN
  MultiUse = -1  'True
END
Attribute VB_Name = "FTPServer"
Attribute VB_Creatable = False
Attribute VB_Exposed = False
'---------------------------------------------------------
'<Purpose> class object corresponding to an FTP server.
' As a class object it can be passed between OLE servers.
'---------------------------------------------------------

Option Explicit

'<Public>---------------------------------------------
Public Alias            As String
Public HostName         As String
Public HostAddress      As String
Public LoginName        As String
Public Password         As String
Public Reconnect        As Integer
Public ServerType       As Integer
'</Public>--------------------------------------------
